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SWITCHES AND JUMPERS 


DEFINITIONS AND SETTINGS 


Jumper 


Jumper § 


MAG. TAPE CONTROLLER 


Jumper 7 
Jumper 1 


“I un Go 


VIEWPOINT TERMINAL 


XEBEC FLOPPY CONTROLLER 


Co 


to 
to 
to 
to 
to 


Switch Sl: 


PARALLEL INTERFACE 


Jumper: 


COM HN CO 


CPU BOARD 
Momentary: Abort switch (red) - program defined 
Reset switch (black) - hardwired 
Dip Switches: Used to run on board diagnostics. 
(bank of 8) All 8 switches are program defined. 
ON OFF 
Switch 1 Boot from floppy Start selected 
at program load diagnostic 
time 
OR 
To exit a running 
diagnostic 
Switches 2 thru 8 Diagnostic Program Defined 
INTERPOLATOR 
IC's 73 and 75 Software configu- 
(DIP switches - 2 banks of 8) ration switches 
Ic 76 Motor Pulse Width 
(DIP switches - 1 bank of 2) Switches 
| | OFF=narrow pulse 
ON=wider pulse 
Ic 8 Interpolator selection 
(DIP switches - 1 bank of 4) 
All off=Board @ 
SASI BOARD 


Jumpers 1 thru 8 are located near ICll. 


i Base Address 


6 Interrupt request level 3 


on J2 Interrupt Request Level l 
on J3 


> Address 


3,5,7,8 are up 


3 on JPl 


2,3,4 on JP2 
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3100 Control PC Boards 


August 30, 1983 


E GNC-1 CPU Released @ 
- GEC-1 INTRP Rel. 9/9 
- GTP-206 Backplane Released 
- GTP-215 CTL Panel Released @ 
—= = XEBEC S-1401 Floppy Purch. 
- GVM-1 (OWL) . SASI (Floppy) Rel. 9/2 
Variable : 9, 
(One required) - GTP-222 OEHI & OEHC Rel. 9/2 Ke lense Yi 
4 fbi Ven p= 2xx OEHF Rel. ~ 
(uo GTP-2xx 35 Rel. - 
OF erp-2xx 6) 6 FE sam Cutter Rel. - 


- Motorola 


MVME435 | Mag Tape Stock } 
ip helen 
- OWL GVM-2 Parallel Rel. - i '" Protos 6/24 
- GTP-2xx NgxT Quick Look Rel. - 
- Motorola | a 
MVME 410 Dual 16 bit Purch. Used w/PPT and 
| Series 1 
= GTP-2xx | IBM Series 1 Rel. - Mounted on 
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74LS8138 
74LS148 
74LS8155 
74LS161 
74LS164 
74LS8175 
74LS191 
74LS244 
74LS245 
74LS367 
74LS368 
74LS373 
5955 


7442 

7497 

74L8123 
74LS136 
74LS138 
74LS139 
74LS157 
74LS161 
74LS175 
74L8191 
74LS240 
74L8273 
74L8283 
74LS393 


14490 
26LS831 


IC IDENTIFICATION 
CPU 


1 of 8 Binary Decoder 

Priority Encoder (Binary Out) 

Dual 1 to 4 Line Demultiplexers 

Synchronous 4 Bit Counter 

8 Bit Parallel-out Shift Register 

Quad D-Type Flip-Flops w/Common Clock and Clear 
Synchronous Up/Down Counters 

Octal Tri-State Line Drivers 

Octal Tri-State Bus Transceiver 

Six Tri-State Buffers 

Six Tri-State Inverting Buffers 

Octal Tri-State D-Type Transparent Latches (Register) 
Timer | 


INTERPOLATOR 


BCD to Decimal Decoder 

6 Bit Binary Rate Multipliers (BRM) 

One Shot 

Quad 2 Input Exclusive-OR w/open Collector Outputs 
1 of 8 Binary Decoder 

Dual 2 to 4 Line Decoder 

Quad 2 to 1 Line Data Selectors/Multiplexers 
Synchronous 4 Bit Counter 

Quad D-Type Flip-Flops 


Up/Down Counter 


Octal Tri-State Buffers 

Octal D-Type Latches 

4 Bit Binary Adder w/Look Ahead Carry 

Dual 4 Bit Binary Counter w/Individual Clocks 


Hex Switch Debounce Circuits 
Quad Differential Drivers 


Address Range 


00000 
40000 
80000 


40000 


42000 


44000 
48000 
40000 


50000 


thru 3FFFF 
thru /7FFFF 
thru BFFFF 


thru 41FFF 
40000 
40060 
40100 
thru 43FFF 
thru 47FFF 
thru 4BFFF 


thru 4EFFF 


thru 53FFF 
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INTERRUPT AUTO VECTOR 


Level 


Abort Switch 

DMA 

Plotter Port 

Duart ( p ) 

I/O Channel 1 ( TAPE 

I/O Channel 2 CParpecec, Paves Tale) 
I/O Channel 3 ( FéePPy) 


mow ko O™N 


MEMORY MAP 


Assigned to 


RAM Memory (256KB) 
Peripherals ; 
EPROM (16 Bit, Only 16KB is used) 


PERIPHERAL BASE ADDRESSES 


I/O Channel (DO-D7) 4KB on Byte Boundary 
Mag Tape 

Floppy 

Parallel (16 Bit) 

I/O Channel (Redundant) 

DMA Port (DO-D15) 

Duart Port (DO-D7) 


Plotter Port (DO-D15) 


Diagnostic Port (DO-D7) 


W to 


W to 


R to 


DMA PORT 


R/W to Address Control Signal Data Bits 
W to $44000 LPS-Load Port Select D0,D1,D2 
(Interpolator Board 
selection) D3 
D4-D15 
W to $44002 LBP DO-D15 


Load Buffer Pointer 


S44004 LBC 

Load Buffer Counter DO-D15 
S44006 STARTD 

Enables DMA Transfer DO-DI15 
S44004 RBC 


Read Buffer Counter DO-D1L5 


Function 


Selects 1 of 8 ports 
for DMA transfer. 
Controls Al/ during 
DMA transfer. DMA 
buffer is lower (0) or 
upper (1) 128KB of RAM. 
N/A 


Correspond to Al>A16 
Pointer can be set to any 
even address in RAM 

above $4000. Area below 


$4000 is hardware inhibited. 


Correspond to the number 
of single word transfers. 
(64KW maximum) 


N/A 


Can be read any time. 
Reading clears DMAIRQ. 


During DMA interrupt service, the buffer counter must 
be read to determine transfer completion (zero count) 


or a fault condition (non-zero). 


DMA will be disabled on each DMAIRQ. DMAIRQ is 

generated on the completion or fault. A fault condition 
occurs during an access of RAM below $4000 or trying 

to access non existing RAM. In both cases DMA will time out. 


R/W to Address 


W to 4CXxX0 
W to 4CXX2 
W to 4CXX4 


W to 4CXxX6 


W to 4CXX8 
W to ACXXA 


W to 4CXXC 
W to 4CXXE 


WRITING TO PLOTTER PORT 


|A10-A13 Contain Port Select Code| 


Control Signal 


LDM 
Load M Register 


LDR 
Load R Register 


LDD 
Load D Register 


LDC1 
Load Control l 


LDC2 
Load Control 2 


Generates Clear 


Data Bits 


DO-D15 


DO-D15 


DO-D15 


D6 
D7=1 


Other Bits 


DO-D/7 
D8-D15 


N/A 


Function 


see Next Page 
Preset to 1/2 Ratio 
Distance Word 


Clears Start/Stop 

Status Bit 0, non latched 

Turns error LED on, 
latched 

Turns start LED on, 
latched 

Not used 

Enables DMA transfer 

to selected device 

N/A 


Motor Pulse Clock Value 
Halt Clock Value 


Write to this address 
clears device 


> Reserved to control special photohead functions. 


M WORD FOR 3100 


15 14 13 12 11 10 9 8 7 - 0 


NMV Tool 2WD. MME B A 
(Delay)| Select Xfer (45°) PUD MJA Sign Sign Velocity 


Ratio is sent on a 3 word transfer; this word is used until the next 
3 word transfer is given. 


If Bit 13 is set, this is a 2 word transfer (M,D) otherwise, transfer 
3 words (M,R,D). 


If Bit 14 is set, load tool registers with M@%M7; decode M8,M9 for 
tool select. 


M9 MB 
QO - Pen Select 
0 1 — Aperture Select 
1 O - Reserved 
1 1 - Reserved 


Pen Selection 


Velocity O- Velocity 
Bits 1—Pen Bits 
M2 ,M1,MO 2-Pen M3 ,M2 


an oe thru 12 - CPO thru CPll 
M4 = Side Select 


Bit 15 (NMV) means no move. Setting this Bit will disable motor pulses. 
Executes delay based on velocity and distance bits value. 


Bit 12 (MME) means min/max equal. Setting this Bit will generate a 45° 
line. 
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READING FROM PLOTTER PORT 


R/W to Address Control Signal Data Bits Function 
R to 4CXxX0 RDW1 DO-D15 Read Status Word 
Read Word 1 


2 1 0 
ESP |Lamp (|Start/ 
Fault |Fault |Stop 
Switch 


14 13 
-X +Y 
Slew Slew [Slew 


Condition is true when specified Bit=l. 


/ 


Generates IRQ 


R to 4CXX2 RDW2 DO-D15 Read Configuration 
Read Word 2 Switches 
(see next page) 


R to 4CXX4 RDW3 
Read Word 3 DO-D15 Read Status Word 
and clear IRQ 


R to 4CXX6 
R to CHXB > Reserved for OEH status. 


R to 4CXXA 


Note: Al1O thru Al3 contain port select code for systems containing 
multiple interpolators (ports). 


OEH I MODULE 


Module has redundant 6 Bit M Register. 


DO-D4 For aperture select 
Dll - ‘To detect pen down move 


Bits 14 and 9 = 1, and Bit 8 = O will load module M register when XFB=1. 


After aperture select has been initiated and the attempt to open the shutter 
follows it (M11=1), the circuit generates wait signal to interpolator. This 
prohibits the transfer and execution of the next command set (M,R,D) until 
aperture select is done. However, if the shutter is not going to be opened, 
the plotter can be moved while aperture select is in progress. 


3100 POWER UP SEQUENCE 


(Applies to proms marked GSI bug $5 only) 


After the reset or program load switch is depressed, the bank of 8 
DIP switches on the CPU board are read in. 


Then: 
A) If switches 2,3,6,7 are on and 1,4,5,8 are off, we will enter 
"GSIBUG". 


B) If switch l is offand all the rest are on, the "Extended 
Memory Test" will begin to run. 


Note: See '"Memtest" description for operating instructions. 


C) Any other switch setting will cause: 


Ist step A "Power up memory test'’ to run for 7 seconds (approx.) 
When the test starts, the start LED on the control 
box will turn on. If the test completes successfully, 
the start LED will be turned off. If an error is de- 
tected, the error LED on the control box will turn 
on and an error message will be displayed in the LEDs 
on the CPU board. (See 'Memtest" description for de- 
tails.) Then the program will stop (loop). 


2nd step If the memory test runs successfully, then the "boot" 
program will issue the internal and RAM diagnostic 
commands to the floppy controller before attempting 
to read from the disc. If these two commands or any 
other commands do not complete successfully, the con- 
troller error code will be displayed in LEDs on the 
CPU board, the error LEDs on the "SASI" board and the 
control box will turn on. Then the "boot" program 
will start from the beginning again (keep trying). 


FATAL ERROR 


A fatal error in the "boot" program occurs when we 
get an error during the "request sense status" com- 
mand. We issue this command after an error is detec- 
ted during another command to get the error code. 

A fatal error will turn on the "SASI" board and con- 
trol box error LEDs and then the program will stop. 
At this point, the only option is to depress reset 

or program load to start the power up sequence from 
the beginning. 


3rd step The ''boot" program reads in our software starting at 
track 1 and sector 1. If an error occurs during this 
process it will be handled as described above in step 
2 
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Xebec Controller (S-1401C) Error Codes 


The following are the error codes and descriptions that 
apply when this controller drives the Tandon TM-100 5% 
inch floppy drive on the 3100. 


If an error occurs while booting, the error code will be 
displayed in the LEDs on the CPU board, provided a fatal 
error does not occur (see first page). 


EXAMPLE: Refer to last page. 


HEX CODE 


14 The most significant digit, 1, will be dis- 
played on LED bank 3 in binary. LED #5 is 
the LSB and LED #8 is the MSB. 


The least significant digit, 4, will be dis- 
played on LED bank 2 in binary. LED #1 is 
the LSB and LED #4 is the MSB. 


HEX CODE DEFINITION 
00 The controller detected no error during the 


execution of the previous operation. 


06 After stepping maximum number of cylinders, 
controller did not received track O00 signal 
from drive. 


10 An error was detected in the CRC of the target 
ID zone. 


11 Write fault. 


12 A write was attempted on a write protected 
floppy diskette. | 


14 Sector Not Found: The controller found the 
correct cylinder and head, but not the target 
sector. 

15 Seek Error: The controller detected an in- 


correct cylinder or track, or both. 


16 Format track timeout error. 

17 Format track not complete. 
19 Two sided error. 

1A Wrong data mark found. 

1D Lost data in FDC. 


1lE Data CRC error detected. 


HEX CODE 


LF 


20 


21 


22 


23 


30 


31 
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‘DEFINITION 


FDC busy error. The LSI FDC chip was busy 
executing a command. This is a timeout or 
chip reset failure. 


Invalid Command: The controller has received 
an invalid command from the host. 


Illegal Disk Address. The controller detec- 
ted an address that is not within the limits 


of the drive characteristics. 


Something in the 8 bytes of data which speci- 
fy the drive is not permissable. 


Invalid interleave. 


RAM Error: The controller detected a data 


error during the RAM sector-buffer diagnostic. 


Program Memory Checksum Error: During its 
internal diagnostic, the controller detected 
a program-memory checksum error. 
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MEMTEST 
Overview 


This is the memory test for the RAM (currently 256KB) on 
the 3100 CPU board. This program resides in prom on the 
CPU board and uses RAM ONLY to output error messages to 
the CRT. ERROR MESSAGES OUTPUT TO THE CRT USE RAM FOR A 
PRINT BUFFER. THE AREA OF RAM USED IS BELOW ADDRESS $800. 
THEREFORE, IF LOWER MEMORY ($0-$20000) IS "DEAD", OUTPUT- 
TING AN ERROR MESSAGE TO THE CRT WON'T WORK. IN THIS IN- 
STANCE, THE ERROR CODE DISPLAYED IN THE LEDS ON THE CPU 
BOARD MUST BE USED. 


During one complete pass, this program writes and verifies 
4 different data patterns, and verifies RAM addressing 
twice. One pass takes about 25 seconds. 


A portion of "Ramtest" is also run on initial power up. 
Locations $0000 thru S$3FFFE are tested by writing and 
verifying test pattern $0000, then one pass of the address 
test is run. If successful, the start LED on the control 
box will turn on when the test is started and off when 

it ends, then the system will boot. Upon detecting an. 
error, the control box error LED will light and if switch 
2 is on, an error message will be output to the CRT. 
REGARDLESS OF SWITCH 2"*S POSITION, AN ERROR CODE WILL BE 
DISPLAYED IN THE LEDS ON THE CPU BOARD. 


NOTE: The power up ramtest takes about 6 seconds start 
to finish. : 


Datatest 


This test is specifically designed to test 64K RAM chips. 


The program writes the test pattern to all of memory first 


then goes back and compares what was written to what it 
reads. This sequence is done to force refreshes between 
the write and read portions of the test. The four test 
patterns used are: $0000 | 
. SFFFF 
$5555 
SAAAA 


The last two test patterns will be complimented before. 
being written to a memory location (except for the first 
location and every 257th location). This results in a 
true checkerboard pattern within a RAM array of 256 by 
256. | 
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Address Test 


A "march pattern" test is run immediately after each of 
the first two test pattern data tests: $0000 and SFFFF. 


The "march pattern" test "walks" A 1 or A O bit thru a 

RAM chip array previously filled with bits of the opposite 
polarity, insuring along the way that every location in 
the array answers to it's own address only. 


CPU Board Switch Assignments 


Switch 1 OFF Starts extended memory test. 
ON Stops extended memory test. 


Switch 2 ON Error messages output to CRT as well as LEDS. 
OFF Error messages output to LEDS only and stop 
testing. 


Switch 8 has meaning only when error messages are being 
output to the CRT (switch 2 "on"). 


Switch 8 ON Halt on single bit error and wait for start 
switch before testing next location. 


OFF Display errors but do not halt. 


CPU Board LEDS Control Box LEDS 
5-8 ON = Error in upper 128KB Start = turns on when testing begins 
5-8 OFF = Error in lower 128KB turns off when testing ends 


1-4 = Failing bit in binary Error = turns on when error detected 
LED 1 is the lsb 
LED 4 is the msb 


(see last page) 
CONTROL BOX SWITCHES 
The start switch is used after an error has been detected 


to restart testing at the failing location plus 2 only when 
switch 2 is "on" (outputting error messages to CRT). 
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OPERATING INSTRUCTIONS 


Set CPU board switch 1 "off" to start the extended test. 
Set CPU board switch 8 and 2 to desired position. 

3. Depress program load switch. If the test is running, 
the control box start LED should be lit. 


NO 


When you want to stop the test, turn switch 1 "on", the test 
will then complete the current pass, turn off the start LED 
and stop. 


Displaying Errors 
If switch 2 is off: 
Upon detecting an error, the program will turn on the con- 
trol box error LED and display the failing bit and address 
range in the CPU LEDS as described above. If more than one 
bit is found to be failing, the first failing bit will be 
displayed and the display will then flash on and off. [In 
either case, testing will stop. 


If switch 2 is on: 


Error messages will be output to the CRT in the following 
format. 


Failed at: (address) Wrote: (test pattern) Read:(data read back) 
If switch 8 and 2 are "on": 


The start switch will cause testing to resume at the failing 
address +2. 


If switch 8 is "off" and switch 2 is "on": 


The error will be displayed and testing will resume at the 
failing address +2. 
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INTERPOLATOR DIAGNOSTICS 


Presently Interpolator Diagnostics allow the user to input MRD words 
directly to the interpolator to test different hardware functions. 
Future release will include the ability to test DMA transfers to 


the interpolator. 


The program allows the input of a group of MRD words with the ability 
to repeat up to 2,147,483,647 times. 


Input data format is in hex. 


~ MMMM RRRR DDDD 

Exl 0O0€F 0001 8000 
controls velocity 

Exl sets M word velocity to max 


Ratio = 1 
Distance =32768 


To interpret MRD transfer results decimal display counters are connected 
to PIN 2(XMP+) and PIN 21 (YMP+) of the plotter connector. Make sure 
the interpolator is not halted before starting a MRD word transfer 

(halt led off). 


ALL TESTING IS PERFORMED WITH THE TABLE DISCONNECTED* 


RATIO EQUATION 


For specific calculation of major and minor pluses use the following 


equation 


Ratio= Minor x 65536-32768 
- major 


Ex. 2 If D word=10 what ratio needed to generate 1 minor pluse? 


R=1x 65535-32768 
to 
R=3276.8 or 3277 = CCD hex 
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MAX VELOCITY 


The interpolator diagnostic can be used to calculate maximum velocity. 
Results of this test are compared to know acceptable data for the . 


table in question. 


Ex3 For 41 Table - find velocity on axis 
known At =154.2us @ stepsize (ss) Ax=.0005 


THEN V4i1 
calculated 


=,0005 In/step 
154.2x10 °sec/step 


=3.24 in/sec 


or 
3.24 in/sec x 60 sec/min=194.4 in/min 


SO INPUT MMMM RRRR DDDD  _ Repeat as necessary to read pluse width 


OOfF) XXXX XXXX 
— 


MEASURE AT WITH SCOPE 


Ex. measured At=7.5 div 
| : | | =150us 
kate 


150 us measured 


(20us/div) 


THEN V4l1 = 
| measured 


= .0005 in/step 
150x10~° sec/step 


=3.33 in/sec or 3.33 in/sec x 60 sec/min=200 in/min 


OR SIMPLY COMPARE At known Ys At meas. 154.2 us & 150us 
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¢€ HEX HEX 
M WORD R WORD 
OOFF 0001 
OOOF 0001 
OOFF 8000 
OOFF OOF9 
OOFF OOFA 
OOFF OOFB 
OOFF OOFL 
OOFF 8000 
OOFF FFFF 
OOFF 8000 
OOFF OCCD 
OOFF 0002 
OOFF O1F4 
OOFF 0800 


INTERPOLATOR TEST DATA 


HEX 


D WORD 


8000 
8000 
0001 
8000 
8000 
8000 
8000 
OOFA 
8000 
FFFF 
OO0A 
4000 
FFFF 
OOFF 


DEL, 
MAJOR PLUSES 


32768 
32768 
1 
32768 


32768 


32768 
32768 
250 
32768 
65535 
10 
6384 
65535 
255 


DEL, 
MINOR PLUSES 
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DIRECT MOVE INTERPOLATOR 


STOP RAMP CLOCK 41 TABLE DIVIDE BY CLOCK SPEED 


MOVE.W 
MOVE .W #9 ,S4CGGA 
BSR WAITBUFF 
MOVE .W D1 S4CcGG¢G 
MOVE .W D2 $4CGG2 
MOVE .W D3,S4C9G4 
SELF BRAS SELF 


SET CLOCK CONTROL REGISTER 
CLEAR DEVICE (CAUSES HALT) 


WAIT FOR BUFFER EMPTY 
M-WORD 
R-WORD 
D-WORD 


Routine to wait for plotter buffer to be empty. When outputing moves 


directly to the plotter(such as slew or initialization) we must make 


sure the previous command has been accepted by the plotter. 


WAIT BUFF MOVE .W $4CGGG,D7 


TST.B D7 


BPL.S WAIT BUFF 


is buffer empty bit set. 


FLOPPY TEST 


COMMANDS: 
nn t—7 


i 

€ RD Read sector from floppy 
WR Write sector to floppy 
FM Format diskette 
DA Specify data to be written (see "DA" below) 
UN Specify unit number (@) 
HD Specify head (@ or 1) | 
TR Specify track number (@ thru 79) 
SC Specify sector number (@ thru 15) 
CB Compare read data buffer to data previously written 
DT Disc test-perform all functions of the controller 
DE Disc exerciser-read random sectors and verify contents 

(verifies data written during "DT") 

DR Read sector @ on every track 
IN Perform on board internal processor diagnostics’ 
RA Perform on board RAM diagnostics 
* Specify number of repetitions 
+ Increment last specified value after each operation 
- Decrement last specified value after each operation 


EX Exit floppy diagnostic 


DATA FORMATS (DA) Specify data to be written 


All @'s 

All l's 

O thru 9 over and over 

A thru Z over and over 

Any character typed in by user 

Text typed in by user. 

Track and sector numbers over and over 


NOR WN RH a 


EXAMPLES: 


Unit X Head X Track X Sector X 

WRDAQ Will write all @'s 

WRDA4T Will write all T's | 

RDCB*3 Will read previously written data and compare buffers 


in memory 3 times. 
RDUN@HDITR44SC3 Will read sector 3 on track 44, unit @, head 1 


MOVE 
ERA 


rE 


NXT 


EPROF Table 


DC.E 
DC.E 
DC.E 
DC.E 
DC.E 
DCE 
DC.E 
DC.E 
DC.E 
DC.E 
DC.E 
DC.E 
DC.E 
DCE 
DC.E 
DC.E 
DC.E 
DC.E 
DC.E 
DC.E 
DC.E 
DC.E 
DC.E 


DC.E 


13 


DC.E 


+ 


_~SEC DO Get maxt carton nnintan 
RETURN. I Return 
0 00 No error 
-6 Ol Undefined 
~i9 02 No seek complete signal 
-—&§ 03 Undefined 
aa aed 04 Not ready (after select) 
6 a Undefined 
~19 O46 Track 00 not found 
-16 07 Door open om drive 
-19 O08 No head loaded 
-6 09 Undefined 
-6 OA Undefined 
-—6 OF Undefined 
-4 OC Undefined 
-6 OD Undefined 
-6 OE - Undefined 
—& OF Undefined 
-14 10 ID CRC error 
~1 4 11 Write fault 
are 1Z Write protect 
—6 13 Undefined 
= 14 4 Sector mot found 
-17 5 Seek error | 
=a 16 Format track timeout error 
14 17 Format track not complete 
»>FDOSKDVR .SA 12/02/83 15243226 
-6 18 Undefined 
17 19? Two sided error a 
=14 1A Wrong data mark found 
-18 16 Transfer length error 
=o. 1C Undefined. | 
-18 1D Lost data in FDC 
-~14 1E Data CRC error 
-18 1F FDC busy error. 
at 20 Invalid—commandad | 
~17 21 Tllegal disk address 
~17 22 - Configure data error 
-~17 23 Invalid interleave 
—§ 24 Undefined 
~~} Zo Undefined 
—-6 26 Undefined 
-§ a? Undefined 
-6 28 Undefined 
-& 2°? Undefined 
-4 ZA Undefined 
—& ZE Undefined 
-~6 fd Undefined 
~§ Fd Undefined 
~& z Undefined. 
-6 ZF Undefined 
-20 30 RAM error 
~20 31 Frogram memory checksum error 
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Magnetic Tape Diagnostics 


Quick Data Test 


This test is entered by typing "3" on the main menu then "1" on the 
tape diagnostics submenu. This test will rewind the tape drive to 
the load point and then write a specified byte of data, a specified 
number of times per record, and a specified number of records in 

the file. The program will then rewind the drive and read the data 
back comparing it to what was written. The program provides for 
modifications of the default parameters which will not change unless 
the user specifically changes them or the user exits the Quick data 
test submenu to the magnetic tape test main menu. The default para- 
meters and their ranges are: 


Name — Default value Range 
Data Byes -127 -127 ..- 127 
#of bytes per record 256 0... 1024 
# of records per file | 20 0... 250 


Typing a value outside these values will result in the default value. 


The quick data test provides error messages and gives the operation 
which was being attempted when the error occurred. 


Examples: 


1) unit not on line 
error during rewind operation 


2) No write ring detected error during mag tape write operation 
3) Data read does not match data written error during data compare 


If no errors occur the message will read: 
No errors in quick data test 


Using the quick data test is as simple as selecting "1" from the Quick 
data test submenu and pressing return. To alter the parameters type "2" 
at this level,-the program will then prompt you for the data byte, 
followed by the prompt for the number of bytes per record, and finally 
the number of records per file. After entering the number of records 
the test will automatically run. Repeated rests using the same 
parameters can be run by typing "1" followed by a return. In each 
prompt the range of acceptable values is displayed. Typing a value 
outside the accepted range will cause the default valué to be used. 


Ph on Rhett bt ithediderbedeed at oh Bde ed ok CUT 


Examples: 


1) 


Quick data test 
1. Run test with present parameter values 
2. Alter parameter values 


99. Exit 


Please enter a menu choice 1 


This will cause the program/test to run with the present parameter 


values. 


2) 


These will be the default values or the user inputed values. 


Quick Data test 


1. Run the test with present parameter values 


2. Alter parameter values 

99. Exit 

Please enter a menu choice 2 

Type in the data byte (-127...127) 
-1 

Type in the number of bytes per record (...1024) 
1024 _ 

Type in the number of records in the file (....250) 
200 | | 


This sequence will cause the system to write and verify 


200 records of 1024 bytes each with each byte being equal 
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MOTOROLA M68000 ASM VERSITUN 1.80875 2 At. *MAGDYR .SA 03/08/84 14338254 PAGE j i 
Co tee eee eee NEC 3100 MAGTAFE DRIVER -~--------- 
| 2 x 3 
a 3 OPT CRE E 
4 x . 
{ 5 00000009 SECTION 9 
é x 
a 7 XDEF MAGDVR » MAGINTRF 
8 XDEF MAGDVR1 
9 XDEF MAGDVR.I 
XDEF MAGDVR.T 
x e 
x XREF  SETTMR 
x XREF STARTTHR 
x XREF STOPTMR . 
x 
MOK KKK KKK KK KKK KKK OK 
"4 ; x i 
x x 
x NAME? MAGDYR x E 
x ~--- x 
x x ) 
x DATE: 05-06-83 
> 4 ee 
x r) 
x AUTHOR? MM. JEAN ‘ 
K ee ae m0 en ae ow 
* | } 
x REVISION: 1.2. 
> a i . 
x a | . d) 
x MAJ 07-15-83 Added software to handle the case of file 
x searching over blank tape and gracefully terminating the driver. 
x 
x MAJ 07-25-83 Added time-out software, ze 
x : .$ 
x | . 
x MIC 08-29-83 Added software to handle wnvalid interrupts (MAGINTRF) 
x 
x . d; 
x MODULE DESCRIFTION? ; 
MH came tt nee een ere mete ce meek me tne eae ent cae nem wens eee ee 
‘ > 
x This module controls a11 I/0 functions between a Motorola 68000 
x I/0 channel and a COC magnetic tape drive and formatter, inter- ) 
x faced by a Motorola mag tape adapter (MTA). 
x 
x 
x See + $e ene eee + » 
x | ‘te. tama ene + ! j 
x 1 68000 Jaen nnn >] 4 [ee eese > | CDC i Fy 
| x | CPU or ee | MTA I | MAG TAPE I. 
mt | Seti laeiate el SC Cote | ‘ORIVE 4 
t x | 1 a Soe + | | 
x $e ew re wm ewe + af “nf cee nee ee ee ee mroe ee cee ome we + > 
| x 
x “The: MTA will use the buffered transfer method. - The I/O channel 
i x 


master can buffer up-to 4k of data in the on-board FIFO before 
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transferring the dats from I/0 channel master to tape (Tape Write) 
or vice versa (Tape Read), This eliminates generating an inter- 
rupt for every byte transfered and thus reducing overhead. 


The MTA provides the following functions: 
1. Read forward 1 record 
2- Read reverse 1 record (not used at this time) 
3. Write forword 1 record 
4. Write file mark 
5. Search file mark forwara 
4. Search file mark reverse 
7. Space forward 1 record 
8. Space reverse 1 record 
9. Rewind the Magnectic tape to the BOT 
10. Error handling 


Formatter commands are divided imto three categories: 
1. Group commands 
2. Discrete commands 
3. Transport/density select command 


The interface lines of gjgroup commands are 
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| Read forward record | 
| Read reverse record | 
| Write forward record | 
| Write file mark | 
| Search file mark forward 1 
| Search file mark reverse | 
| Space forward record | 
| Space reverse recors | 


oe ome sane Mme Mame cme ne mime teem eee eee cue ame tne em) cone ee aye omer emer ume cm wume ome mnee meme eee mete ue min Sne ee wiles sure mene come cere mem cums mmr sete meme mes we ete cee mm oe ee ete eee ee mem ae enn ee te meee ee ee ee 


PAGE 


Lp TT EEA ETE TTB RTE FHPT STEP 


5 ee s a 


» 


MOTOROLA M68000 ASM VERSION 


eet See wee ee eee nee cee 


NFC 3100 MAGTAFE DRIVER 
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1.30SYS : 15, 
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MTA reset 
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Formatter disable 


»>SA 03/08/84 146398156 


The MTA status register consists of twor 8-bit registers 
(The status register is ae read only register) 
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STAT2 
Bit 0 : ST1 
Bit 1 ¢ ST2 
Bit 2 : ST3 
Bit 3 ¢$ ST4 
Bit 4 ¢ FIFUL 
Bit S ¢ FIHAL 
Bit 6 ¢%¢ FIEMP 
Bit 7 $$: DNBSY 


D2 D1 DO | 
0 8) 1 
0 1 0 | 
1 0 0 | 
0 0 0 I 


STAT1 & STAT2Z: 
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NOTE! ST1-ST4 cause interrupts when true. These bits 
“- gre reset when either STATI or STAT2 are read, 
Because they are reset STAT2 should always be 

first, 


read in 


LP,» EOT 


SH 

=4 

nN 
iow ow 


’ 


ccG 


FM» FNBSY 
DURING DMA 1/2 FULL READ OR WRITE 
TAPE WRITE ERROR OR READ AFTER WRITE 


Offsets of I/0 addresses as follows} 
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1(40000) 
8( 40000) 
16(40000) 
24(40000) 
33(40000) 
41(40000) 
48 (40000) 
546( 40000) 
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The calling sequence of this driver will be as follows? 


MAGDVR (COMMAND » STATUS »BUF FER) 
A A 


A 
| |  leeliaa tented call by name (long word) 
| | meee nee ee eee call by name (long word) 
Lea Sena re oe call by value (long word) 


An alternate entry point (MAGDVR1) is provided to allow the 
PASCAL programs to use the driver for two different sata types 
(e.g. character or rumeric), 


COMMAND 


The COMMAND parameter is a long word valves The command 
code byte is contained in bits 0-7,- 
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The following is a list of the command codes and operations 
this driver recognizes! 


~> INITIALIZE 

~> READ DATA. 

~> WRITE DATA 

-> REWIND | 

~> FILE SEARCH 

~> WRITE FILE MARK 
~> SKIP RECORDS 


Om Clr hoe © 


The STATUS parameter is returned by the driver. and indicates 
what happened or.is happening with the driver. When an 
operation is started STATUS will be set busy (-7) and no 
further commands will be processed until the operation 


completes and goes not busy: “STATUS will he returned as 
follows: 


0 -> NO ERROR (READY) 
-1 -> EOF 

-2 -> BOT ERROR 

-3 -> EOT ERROR 

-4 -> NOT ON LINE 
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~~ -------- NPC 3100 MAGTAFE DRIVER ---~------- 
205 x -§ -> WRITE PROTECTED (NO WRITE RING) | 
206 x -~6 -> HARD ERROR : 
207 x -7 -> COMMAND REJECT (BUSY) : 
208 x ~8 -> RECORD SIZE EXCEEDS BUFFER CAPACITY 
209 x -10 -> TIME OUT 
210 x -20 -> BLANK TAPE ERROR : 
ran | x i 
212 x 
213 x BUFFER : ; 
- 214 KR eee | 
215 x 
216 x This 15 a long word address of the I/O buffer to be used 
217 x for data transfers with the mag tape. The first word in the 
218 x buffer is used as a character count. When doing a READ [ 
219 x operation it indicates the maximum number of characters to 
- 220 x be placed in the buffer. When doing a WRITE operation it 
221 x indicates tha actual number of characters in the buffer to | 
222 x. be written. The character count will be updated when the 
223 x operation being performed is complete to reflect the actual ; 
224 x number of characters transfered. The following is a repre- 
225 x sentation of the buffer? ng ; 
7 226 x . 
227 x word 1 I word 2 ! word 3 | 
228 ._ =< Sesser eo Sens Sees SAS eS ee ee ee ee ee ' 
a “ 229 x 1 buffer count I char 1 | char 2 1! char 3 | char 4 | etc... : 
230 x aon nn enn nn nn een nn enn nnn nnn nnn een === 
* 232 x When file searching or skipping records the buffer count - : 
233 x is used to indicate what file to search for or how many : 
234 x records to skip. When file searching the actual file mumber ; FE 
* 235 x desired is passed. Load point is defined as file number 1, A 
236 x When skipping records the buffer count contains the relative E 
237 x ‘number of records to skip from the present position of the ; 
- 238 x tape. Fositive numbers indicate forward record skipping and : E 
2 239 x negative numbers are used to indicate reverse record skipping. : 
: 240 x : 
- 241 x 
242 x 
3 E 
‘ “) i 
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00000000 
00000001 
00000002 
00000006 
00000014 
00000015 
00000010 
00000011 


00000001 
00000002 
00000004 
00000008 


00000001 
00000008 
00000010 
00000018 
00000021 
00000029 
00000030 
00000038 


9 00000000 00 
9 00000001 00 


9 00000002 0000002C 


1.30SYS 


uM MM 


x 
READFWD 
READREV 
WRTFWD 
WRTEOF 
FILEFWD 
FILEREV 
SKFFWD 
SKF REV 
x 

x 

x 

REWND 
OFFLINE 
FMTDSBL 
MTA_RST 


MAXINVAL 
MAGINTRP 
REGLIST 
x 
REGSAVE 
x 


— —_ 


-EQU 


INTERNAL OPERATIONS 


GROUP COMMANDS 


EQU 0 
EQU 1 
EQU 2 
EQU 6 
EQU 20 
EQU 21 
EQU 16 
EQU 17 


DISCRETE COMMANDS 


EQU 
EQU 
EQU 


Orn = 


I/O ADDRESS OFFSETS 


EQU 1. 
EQU 8 

EQU 16 
EQU a4 
EQU 33 
EQU 41 
EQU 48 
EQU 96 


REGISTER SAVE DEFINITION 


DC .6 0 

DC.E 0 

REG DO-DS/A0-A4 
DSL 11 
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Invalid interrupt count 
Valid interrupt flag 
Register save list 


Register save area 
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4 MOTOROLA M68000 ASM VERSION 1.30SYS 3; 15, »MAGDVR .SA 03/08/84 16338356 FAGE 7 . i 
ieaiediastnetetatetadan NFC 3100 MAGTAFPE DRIVER --~~------ : 
N 286 KKK KKK KKM KK KKK KM KKK KK KKK KK KM KKK KKK KKK KKK KKK KK KKK KM KKK KKK KKK KKK KKK KKK KKK KKK | 
287 x x E 
288 x . x } 
‘ 289 x MAG TAPE DRIVER ENTRY FOINT BY SUBROUTINE CALL x * 
290 x x 
291 x x ; 
4 292 OPES SSSOSSSSSSS ESSE SSOSS SSS SSESSS SOS SSSES OSS SSS SO SSS SSS SSSS SESS ESOS SOSS OOS OSES OSS . > 7 
293 x 
Ys fos a 0000002E MAGDYVR EQU x Driver entry point 
5 299 9 0000002E MAGDVR1 ERQU ' x Alternate driver entry point » 
296 x 
297 9 0000002ZE 40F9000005D8 MOVE.W SR» PSWSAVE Save current proc. status word 
» 298 9 00000034 46FC2400 MOVE .W #$2400595R Turn off interrupts (to level 4) > 
299 9 Q0000038 48F91F3F0000 MOVEM.L REGLIST»REGSAVE Save registers 
0002 . 
1 300 x ; . » i 
301 9 00000040 285F MOVE.L (SP)+7A4 Save the return address 
302 9 00000042 245F MOVE.L (SP)+yrA2 Get address of I/O buffer 
’ 303 9 00000044 225F MOVE.L (SP)+rAl Get address of status parameter » 
304 9 00000046 201F MOVE.L (SP)+D0 Get the command 7 
305 x . Pa , : 
Y 306 % 00000048 23CA000005EO MOVE.L AZ,EUF_ADR Save buffer address > t 
4 307 9 OQOOOD0004E 2309000005DC MOVE.L AlsSTAT_ADR Save status address ; 
ee: 308 9 00000054 2079000005D4 MOVE.L MAG_I0O7A0 Get base address for MAG I/O 
, 309 x . » ' 
; 4 ? 310 x IF NOT ON-LINE - RETURN E 
4 311 x eS 7 | es ; : 
) 312 9 OOO00O0OSA 082800010021 BTST.B #1*xSTAT1I(A0) Are we on-line? a : 
313 9% 00000060 6608 BNE.S CMND,.1 Yesry OK to proceed E 
314 9 00000062 22ECFFFFFFFC MOVE.L #-4 (AL) Nor STATUS = on-line error | 
a 315 9% 00000068 6048 BRA.S RETURN.S Return » i 
316 x : 
317 x IF NOT READY - REJECT COMMAND (READY OR FNESY = 0) 
318 § 
a i 319 9 O0000006A 082800000021 CMND.1 BTST #FOeSTATICAO) Is unit ready? : 
oF 320 9 00000070 46708 BEQ.S CMND,.2 Noy unit is busy : 
> 321 9 00000072 082800040021 BTST #4e9STATI(CAO) Is formatter busy? » | 
322 9 00000078 6608 ENE.S CMND.3 Norv OK to continue 
323 9 O000007A 2Z2ECFFFFFFF9 CMND.2 MOVE.L #~-7 (AL) STATUS = busy 
> 324 % 00000080 6030 BRA.S RETURN.S Return » 
325 x 
326 x SET UP TIME OUT TIMER 
a 327 x im .: 
328 x MOVE.W #107-(SP) Set time out value to 5 seconds 
329 x PEA.,L MAGDVR.T Time out handler address 
» 330 x JSR SETTMR Go program timer 
331 x 2 
332 x DETERMINE COMMAND 
4 333 x ; i 
334 9 00000082 E500 CMND.3 ASL.B #27D0 Adjust for long word addressing 
335 9 00000084 13C0000005DB MOVE.B DO» COMMAND Save adjusted command 
2 3346 9 0000008A 47F900000096 LEA.L CMNDS.S»A3 Get jump table address 4 
337 9% 00000090 DéCO ADDA DOrA3 Add index 
338 9 00000092 2653. MOVE.L (A3) 2A3 Get address of command instructions 
*» 339 9 00000094 4ED3 JMP.L (A3) Go do command * a 
x ° age 


TABLE OF ENTRY POINT ADDRESSES 
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e MOTOROLA M68000 ASM VERSTON 1.30SYS p Bs a »>MAGDVUR *SA 03/98/84 16338256 PAE 3 
~--------- NFC 3100 MAGTAFE DRIVER ----~--~-~--- 
a 343 % 00000096 00000164 CMNDS.S OC.L INIT.S 
344 9 DOOD009A ODDODODITE DC.L READ.S 
345 % OOOOOOSE 00000262 DC.L WRITE.S 
a 346 9 000000AZ2 00000300 DCL REWIND.S 
347 7 000000A6 0000034C DCL SEARCH.S | 
348 9 QODDD00AA 0000048A DCL FILMRK,.S E 
a 349 9 OODOOODOQOAE 000004E8 DC.L SKFREC.S | 
350 x . E 
351 x RESTORE REGISTERS & RETURN E 
a 352 x 3 : 
4 353 9 OOOOQOOBZ 2FOC RETURN.S MOVE.L A4»-(SP) Fut return address on stack 
3 354 9 OOOO00B4 4CFAIF3FFF4A MOVEM.~L REGSAVEsREGLIST Restore registers 
Za 355 2° OOO000BA 46F9000005D8 MOVE.W FSWSAVE?SR Restore status word & interrupts | 
356 % O000000CO 4E75 RTS Return: 
j 357 x ; 
g 8 
ae 
2 | 
2 : 
aa 
a : 
o 
> a 
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MOTOROLA M68000 ASM VERSION 


7 nm ome ne ee em ee ee eee ee 


WVVesconuvo. woeswvwvs 


ow OOOO SO 60 OO 


G00 00D O 


000000C2 


000000CA 
000000D0 
000000D6 
000000DC 
000000DE 
000000E0 
000000E4 
000000E8 


OO0000FO. 


O00000F2 
OOO000FS 


000000F8. 


OOOO0O0FC 
OOOOOOFE 


00000104 


0000010A 
00000110 
00000112 


OO0O0O0011A 


0000011C 
OOOOOLIE 
00000120 
00000124 


00000126 
00000128 
0000012E 
00000134 
00000136 
00000138 


0000013A 
0000013E 
00000142 
00000146 
0000014A 
0000014E 


00000152 


NFC 3100 MAGTAFE DRIVER 


000000C2 


ASFILF3FO000 
0002 
2907900000504 
Z479O000005E0 
2279000005DC 
4280 

4281 
10280029 
12280021 
003900010000 
0001 

672A: 
08010002 
661A 
08000003 
675E 
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«SA 03/08/84 16338256 
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aM ME 
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MAG TAPE DRIVER ENTRY FOINT BY INTERRUPT 


ee EQU 


22BCFFFFFFFA 


‘317000080010 


117000040010 
6044 
33FC00010000 
OSES 
603A 


4283 
1600 
0203004B 
6736 


4282 
1439000005DE 
47F90000013A 
DéC2 

2653 

4ED3 


0000017A 
000001BC 
000002CA 
0000032E 
000003D4.. 
00000484. 
0000054C 


VI 


* 
x 
x 
CMND.4 


x 

x 

x : 
CMND.5S 


x 


~~ MOVESL 
~ MOVE. WH 
~MOVE.B 
' BRA.S 


CMNDS.I 


MOVEM.L 


MOVE.L 
MOVE.L 
MOVE.L 
CLReL * 
CLReL 
MOVE.B 
MOVE.B 
CMPI.B 


- BEQ.S 


BTST.L 
BNE.S 
BTST.k 
BEG.S 


MOVE WwW 


BRA. Ss 


IF BUSY. 


CLRoL 
MOVE .B 
AND.B 
BEQ.S 


GO BACK 


CLR.L 
MOVE.B 
LEASL. 
ADDA 
MOVE.L 
JMP.L 
DC.L- 
DC.L. 
DC.L 
DC.L 


-DC.L .. 
 OCeL 
goes iC 
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REGLIST »REGSAVE 


MAG_IOrAO 
BUF ADR» A2 


‘STAT_ new Al 


DO 
D1 
STATZ(A0)»DO 


STATLCAO) o DL 
(#1 yMAGINTRP 


$-6) CAL) oe : 
~ SMTAS RST yDSCMD(AO): 
#FMTDSBL »DSCMD(A0) 


RETURN.I 


#1,/ACTFILE 


RETURN. aan 


x 
x 
x 
x 
x 
x 
Interrupt service routine 

Save registers 

Get base address of MAG I/O 


Get buffer address 
Get external status address 


Get status byte 2 
Get status byte 1. 
Valid interrupt ? 


-YESr-continue processing, 
Are we at load point? 


.Hard error? 


NO» return . , 
YES» store error Spetue 
Reset. MTA 


Reset ronwet tae 0 


Return from interrupt 


eer Teset current file value. 


Return. ‘from interrupt. 


FLAG 1s NOT SET “ “IGNORE INTERRUPT 


D3 
DO»D3 
#$4B,D3 
RETNIsI 


Busy? 


Nor ignore ‘interrupt 


TO WHAT WE WERE WORKING ON 


D2 
COMMAND» D2 


 CMNDS + IvA3 


D2»A3 
(A3) 2A 


(A3) | 


INIT» I 


READSI. 


WRITE. I. 


REWIND. 1 
SEARCH.I. °° , 
FEUMRKs Do 
SKPREC+IN ot hs 


Get the adjusted command. 

Get the jump table address 

Add the offset 

Get the address of command instructions 
Go do it — 


ye aa 


RESTORE REGISTERS AND. RETURN FROM EXCEPTION. 


SA es wes ame Oe Oe eo ean . ~z ee athe ag aes 
Lie eS pay ep. eee ie Tt Ae. te we SAS by Renee WS 2 he 


FAGE 
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a ab agate A 
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a NCEE SF a oA EPR 3 es 
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418 


419 9 00000156 423900000001 


in 


a HM OM 


x 


420 9 O000015C 4CFAIF3FFEAZ RETNI.I 
421 9 00000162 4E73 


15. MAGDVR .SA 03/08/84 16338156 
----- NFC 3100 MAGTAFE DRIVER ---------- 


RETURN.I CLR-B MAGINTRE 
MOVEM.L REGSAVE*REGLIST 


RTE 


RETURN FOINT RETN1.I IS USED FOR COMMANDS SUCH AS 
FILE SEARCH THAT REQUIRE MULTIPLE INTERRUFTS. FOR 
THESE» THE VALID INTERRUPT FLAG WILL STAY SET UNTIL 
THE COMPLETION OF THE LAST COMMAND, 


Clear valid interrupt flag 


Restore the registers 
Return from exception 


74 
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MOTOROLA M&S8000 ASM VERSION 
~--------- NPC 


OO OO SO 


00000164 
O0000016A 
00000170 
00000176 


0000017A 


1,30SYS 3: 15. »MAGDVR .SA 03/08/84 16138156 
3100 HAGTAPE DRIVER ~----~----- . 
x 
KKK KKK MK KKK KK KKK KKK KKK KKK KK KK KKK EK KKK KKK KKK KKK KKK KKM KM KKK KKK KKK KKK KKK KK KKK 
ae INITIALIZE MAG TAPE UNIT (SUBROUTINE) x 
xKxwK KKK KK KK KKK KKK KRM KKK MK KKK KKK KKK KK KK KK KK KKM KKK KK KK KK KKK KKK KK KK KKK KK KKK KKK KK KKK 
x 
00000164 INIT.S: EQU x 
317000080010 MOVE.W #MTA_RST»DSCMD(AO) Reset NTA 
117000000018 MOVE.B #0,7TRSEL(AO) | Select formatter 0 
117000040010 MOVE.B #FMTDSBL»DSCMD(AO): Reset formatter 0 
60000188 ERA REWIND.S Go rewind unit 
x ; 
xKKKKK KKK KK KKK MK KKM KKK KM KKK KKK KKM KKK KK KKKKKKKMKEKKKMKKKKKAKKRAKRKKKK KKM KKK KKKKAK 
x INITIALIZE MAG TAFE UNIT (INTERRUPT) x 
«KKK KKK KKK KK KKK KKK KKK KK KKK KKK KKK KKK KAR KKK KKK KKK KKKKKKKAK KKK KK KKK KK KKK KKK KK KKK KKK 
600001B2 INIT.I BRA REWIND.I Do rewind completion 
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PTS ERTL IT ETAT 


a ak CC 


SPE TSE 


REND PPTE ED EY TERS 


eo re 


i. 
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; 
E 
fF 
is 
E 
F 
E 
E 
E 
E 
E 
f 
: 
E 
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MOTOROLA M6é8000 


Siete 


a ie ee OR een 


ba? i * Bi * i * Be é] 


0 OO 


0.0 00 


www W WOO OO OOOO SO 


oO 


oO 0 


wvoa 


OOOO0017E 
00000184 


0000018C 
00000192 
00000198 
0000019A 
000001A0 


000001A4 
OOO0O01AA 
OO0001B0 


00000188 


000001BC 


“000001C0 


000001C2 
000001C4 
000001C8 
O00001CA 
OOOO0ICE 
000001D0 
000001D6 
000001DC 
OOOO001DE 
OOOO01E4 
OOO001ES 


OOOO001EA 
OOO001FO 


O00001F2 
000001F6 
OOOOO1FC 


00000200 
00000202 
00000208 
0000020A 
00000210 


00000214 


00000216 
00000218 


ASM VERSION 


OOOO0ITE 
317000080010 
13FCO00A0000 
OSDA 
33D2000005E4 
082800030021 
670A 
Z22BCFFFFFFFD 
S6000FF10 


117000000008 
22ECFFFFFFF9 
13FC00010000 
0001 
6000FEF8 


OOOO0O1BC 
08000000 
669A 
08000001 
6754 

4282 
08010004 
661A 
Z2ZECFFFFFFFF 
IZ79POOO00SES 
9252 
082800040021 
67F8 
S000FFSE 


082800060029 
6622 


16280001 
4EB9000002Z5E 
15842002 


5242 
B479000005E4 
6DE0 
22BCFFFFFFF8 
6000FF44 


3482 
4291 
6000FF3C 
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NFC 3100 MAGTAFE DRIVER ---------- 


SA 03/08/84 16538356 


KKK KK KK KKK KKK KK KKK KKK KK MK MOK KKK KOK KOK KOK KOK KKK KKK KKK KKK KK KOK OK OK KOKO KKK KOK KKK KKK OK KK KX 


(SUBROUTINE) « 


eS TCC CES CCSESSSSSSSSOSSSSCSSSSSSOSCOSSCOSSSCSCCCCCCOCCCCOSCTCCCTCCTCCTOCC CTC CCC TES 


Reset FIFO to empty 
Initialize retry counter 


Save buffer length 

Is it EOT? 

No» continue 

Yess STATUS = EOT error 
Return 


Issue read record command 
STATUS = busy 
Set valid interrupt flag 


Return 


Pee SSS TS SSS SSSESSSSSSSSSSSCOSSSSCSSCCSSTOCTCSSCTCCCSCCTCCSCCCCCTTECTOCCE TTC CEETOCTTE SE 


CINTERRUPT) x 


KKKKKK KKK KKK KK KK KA K KKK KKK KK KKK KKK KK RK KKK KKK KK KKK KKK KKK KKK KKK KKK KKK KKK KK 


x READ A RECORD 
x 
READ.S  EQU x 
MOVE.W  #MTA_RST»DSCMD(AO) 
MOVE.B #10,/RETRY 
MOVE,W (A2)*BUF_CNT 
RBTST,B #3*STATI(AO) 
BEQ.S READ.S1 
MOVE,L #-37(A1) 
BRA RETURN.S 
x 
READ.S1 MOVE.E  #READFWDyGRCMD(AO) 
MOVE,L #-77(A1) 
MOVE,B  #1»rMAGINTRP 
BRA RETURN.S 
x 
x READ A RECORD 
x 
READ.I  EQU x. 
ETST #07D0 
BNE.S  -RETNi.I 
ETST #17D0 
BEQ.S READ.I3 
CLReL D2 
BIST #4,D1 
BNE.S READ.I1 
MOVE.L  #-19(A1) 
ADDQ.W #1/ACTFILE 
CLR (AZ) 
A ETST #4,STAT1(AO) 
BEQ.S A 
ERA RETURN. I 
x 
READ.I1 TST #4,STAT2(A0) 
ENE.S READ.I2 
x MOVE.B DATIO(A0)»2(A2x02) Get 
MOVE.B DATIOCA0)»D3 
JSR ROTCHAR 
MOVE.B D4s2(A29D2) 
ADD. #1902. 
CMP.W BUF..CNT»D2 
BLT.S READ.I1 
MOVE.L #-8»(A1) 
BRA. RETURN. I 
i 
READ.I2 MOVE.W D2¥(A2) 
7 CLReL ° CALD 
ERA RETURN.I 
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Is it MR. 1600 PE interrupt? 
YES» ignore him and go home. 
Is it a FNBSY interrupt? 

Novy must be error 

Clear byte counter 

EOF? 

Nos get data 

STATUS = EOF 

Increment file counter 
Return with length = 0 bytes 
Wait for FNESY bit 

No» try again 

Return 


Is FIFO empty? 
Yes» 311 done reading 
byte of data 


Get byte of data 
Rotate character 
Put byte in buffer 


Increment byte count 

Reached max. record size yet? 

Get more data 

Yes,y STATUS = buffer overflow error 
Return 


Return. # of. bytes read 


STATUS. = ready 
Return 
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MOTOROLA MS8000 ASM VERSION 
~--------- NEC 


wwvuwouwowvwovouwWdww CO 


Oo ~O 


0000021C 
00000220 
00000222 
00000228 
0000022A 
00000230 
00000236 
00000238 
00000Z3E 
00000240 
00000246 


0000024A 
00000250 


00000254 
0000025A 


0000025E 
00000260 


3100 MAGTAFE ORIVER 


08000003 
6732 
0828000490021 
67F8 
117000110008 
I33900000SDA 
6F1i2 
082800040021 
67F8 
117000000008 
S000FF14 


22BCFFFFFFFA 
5000FF04 


22BCFFFFFFFD 
6000FEFA 


1803 
4E75 


1,30SYS ; 1s. »>MAGDYR (SA O3/08/84 16238:54 
x 
READ.I3 E&TST #37D0 Is it a hard error? 
BEQ.S READ.I6 Nos different error 
READ.I7 B6TST #4,/STATICAO) Wait for read to complete 
BEQ.S READ.I7 Not yet - try again 
MOVE.E #SKFPREVsGRCMD( AO) Backspace recora 
SUB.B #1eRETRY Decrement retry counter 
BLE.S READ.I5S If no more retries - hard error 
READ.I4 BTST.B #4ySTATICAO) Wait for reverse record to complete 
BEQ.S READ.14 Not yet - try again 
MOVE.B #READFWD»GRCMD(AO) Issue read command again 
BRA RETN1,.I1 Return 
* 
READ.IS MOVE.L #-6e (AL) STATUS = hard error 
BRA. RETURN,.I Return 
x . 
READ.I& MOVE.L #-37(AL) STATUS = EOT erorr 
BRA RETURN,TI Return 
x St a x 
ROO OOOO OOOO OOO OIC IO OOOO IOI IOI ICICI ICICI IOI OIC ICI 
x Z ra Vos fo Voges : Ree x 
ROTCHAR MOVE.B D3»D4 
RTS 
x x 


OOOO 0000 IOOOOGIORIOOIOOIOOIGOIOIOIO GOI ICID IORI IOI IOIOIIK OK 
_ j 


x 


prviemrescrerete Ft 


epee ee TE SEE 


) MOTOROLA M6é8000 ASM VERSION 1,30SYS 3 15. »MAGDVR “SA 03/08/84 16:38:56 FPAGE r4 y 
Pena oe ena NFC 3100 MAGTAPE DRIVER ---------- | 
) 525 KK KKK KKK KKK KKK KKK KK KEK KKK KM KK KK KKK KK KKK KK KKK KKK KK KKK KK KKK KKK KK KKK KKK KX ) 
326 x WRITE A RECORD (SUBROUTINE) x 
527 2.9.92 5 2 FS 29 So FF oe eee eT TSF SSS S EO ESE SSSOSSOSOSCSSSCOCCCCCCTCOCCCCCCCTCCTCOTCCTE SE 
528 x : 
> 529 9 00000262 WRITE.S EQU x ’ 
3930 9% 00000262 317C€00080010 MOVE.W #MTA_LRST»DSCMND( AO) Reset FIFO to empty E 
> 931 9 00000268 33D2000005E4 MOVE.W (A2) BUF _CNT Save buffer length 3 
932 9 0000026E 082800060021 ETST.B #6xSTATICAO) Write enabled? . F 
533 9 00000274 670A BEQ.S WRITE.S1 Yes» continue i | 
) 934 9 00000276 22ECFFFFFFFE MOVE,.L '#-S2 (AL) Nor STATUS = write protect error ) : 
935 9 0000027C 46000FE34 BRA RETURN.S Return 
536 x 
? 237 9 00000280 082800030021 WRITE.S1 &TST.B #3°STATI(AO) Is it EOT? > 
338 9 00000286 670A BEQ.S WRITE.S2 Noy continue 
939 9 00000288 22BCFFFFFFFD MOVE.L #-3y7 (Al) Yess STATUS = EOT error 
> 340 9 0000028E 6000FE22 ERA RETURN.S Return > 
341 x 
942 9 00000292 7401 WRITE.S2 MOVE.L #irD2 Clear byte counter 
> 343 9% 00000294 B47900000S5SE4 WRITE.S4 CMP.N BUF _CNT:D2 All done? > t 
944 9 0000029A 6E10 BGT.S WRITE.S3 Yesr go issue last word command 
345 a . 3 
547 x MOVE.B 1(A22D2)*DATIO(CAO) Get byte from buffer and output it 
948 . 
3 549 9 0000029C 16322001 MOVE.B 1¢A22D2)»D3 Get byte from buffer » 
950 9 000002A0 4EBAFFBC JSR ROTCHAR Reverse bits 
S51 9 000002A4 11440001 MOVE.B D4»DATIO(CAO) Move data into FIFO 
352 
» 993 . 
554 
> yuo % 9000002A8 5242 ADD.W #1»D2 Increment byte counter > 
556 9 OO00002ZAA 460E8 BRA WRITE.S4 Do it again 
997 x 
> 258 9 000002AC 317000000030 WRITE.S3 MOVE.W #O0xLSWRDCAO) Send last word to MTA > 
995? 9% 000002B2 117000020008 MOVE,.E #WRTFWDsGRCMD( AO) Issue write record command 
760 9% 000002E8 Z2BCFFFFFFF9 MOVE.L #-7 (AL) STATUS = busy 4 
) 941 9 OOOO0OZBE 13FC00010000 MOVE.B #1»MAGINTRP Set valid interrupt flag > 
0001 [ 
962 9 000002C6& S000FDEA BRA RETURN.S Return i 
> 963 x > ; 
564 ee ee oe ee ee eee 8 Te Fo 8s ott FT TFS C TESS SS SESOCCESESCCSSOSSSSCCCCCCCCCCCCCCEC CCC T i 
965 x WRITE RECORD (INTERRUFT) x ' 
2 566 Pree S222 2 9 2 SS SoS fo oe De oe TFT STFS CSS CSS SSOSSSSSCSCSOSSCSSCOSTOCCCCCCTCCCCCT CEC CTE > f 
567 x 2 
568 9 000002CA WRITE.I EQU x 7 | 
" 5369 9 9000002CA 08000001 ETST #17D0 Is it a FNBSY interrupt? a ; 
i 570 9 000002CE 660A © ENE.S WRITE.I3 Yesy continue | 
371 9 000002D0 08000006 BTST #6D0 Nov is it a@ FIFO empty interrupt? | 
FY 572 9 000002D4 6600FE86 _ BNE RETNi.I Yess ignore (wait for FNBSY) 2 | 
573 9 000002D8 600C BRA.S WRITE.T1 Nor must be error | 
574 9.000002DA 34B9000005E4 WRITE.I3 MOVE.W BUF _CNTs(A2) Yess return # of bytes written L 
2 575 9 000002E0 4291 CLR»«L = (Al) STATUS = ready 2 
376 9 00000Z2E2 S000FE72 BRA RETURN.I Return | 
577 x E 
> 978 9 000002E6 08000003 WRITE.I1 BIST #3,7D0 Is it a hard error? 3 F 
379 9 OQOODO0OZEA 670A BEQ.S WRITE.I2 Noy different error 
5380 9 OOO0O0OZEC Z2BCFFFFFFFA MOVE.L #-69 (Al) - Yess STATUS = hard error 
> 981 9 000002F2 S000FE62 BRA RETURN,I Return 
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583 9 000002F6 
984 9 000002FC 
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3100 MAGTAFE DRIVER -~-------- 


x 


2Z2ZECFFFFFFFD WRITE.I2 MOVE.L 


6000FES8 


BRA 
x 


»+MAGDYR 


#-37 (AL) 
RETURN,I 


+SA 03/08/84 16338354 


STATUS = EOT error 
Return 
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1.30SYS ¢$ 15, »+MAGDVR .SA 03/08/84 16338:56 


~--------- NFC 3100 MAGTAFE DRIVER ~-~-------- 


587 FO OOOO OOOOOOOG OOOO GOGO OG GIOR IG IGIORIOGIOIOIOROIGIORGOIOGIEIDIOIOGICIOIIOIOIOOIOOCIOISIOOIO OOK 

388 x REWIND (SUBROUTINE) x 

789 ITTF TSS S Se SS SSESPESS SSS SESS SOS SSSSSSCSOSSOSSCSSOSESCSCCCOCECCCCCCCCCE CES 

390 x 

591 9 00000300 REWIND.S EQU x 

292 9 00000300 082800020021 BTST.B #2ySTAT1I (AO) Are we at load point? 

973 9 000003046 6618 BNE.S. REWND.S1 Yesr go return 

594 9 00000308 317000010010 MOVE.W #1»DSCMD(AO) Issue rewind command 

595 9 OOOOO30E 22BCFFFFFFF9 MOVE.L #-7,(AL) STATUS = busy 

396 Y 00000314 13FC00010000 MOVE.B #1»MAGINTRP Set valid interrupt flag 
0001 

997 9 0000031C 6000FD94 BRA RETURN.S Return 

598 x 

3999 9 00000320 4291 REWND.S1 CLR.L (Al) STATUS = ready 

600 9% 00000322 33FC00010000 MOVE.W #1,ACTFILE Reset file counter (load point = file 1) 
OSES 

601 9% 0000032A S6000FDB6 BRA ' RETURN.S Return 

602 x ioe feet 

603 2252529925 952 2 2 oD Ft eee et tee tee tee Tee TS eS SS TSEC SSS SSSSSOSSSSSSSSS SOS ES ES 

604 x REWIND ae (INTERRUPT) | x 

605 FSF S28 ee STFS SF Fe ee oS tt FFF FF eS OSS SSCS CSS SOS SOSOSSCSSSSCCOCCCCCCCEC CCE TS 

606 x . ; | s 

607 9 0000032E REWIND.I EQU x . . ; a aa, 

608 9 000003ZE 08010002 . BTST #2,/D1 Check: for: load point 

609 9 00000332 660A BNE.S REWND.I1 Yesr continve 

610 ¥ 00000334 22BCFFFFFFFE MOVE.L #27 (AL) Noy STATUS = BOT error 

611:°9 0000033A S000FEIA ° BRA RETURN.I pe Sap “Return | 

612 | x 

613 9 OOO00033E 4291 REWND.I1 CLR.L CAL) STATUS = ready 

614 9 00000340 33FC00010000 MOVE .W #1/ACTFILE Reset file counter (load point = file 1) 
OSES a5 

615 9 00000348 46000FE0C BRA RETURN.I Return 

616 ae x P - 
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2 x e = Ee a eae 
ee ewe oman FORE MpUOTE En tate ORE ROS ARATE ETT 
fra renee pee ERY sepeegyee yh MYESTUP INT Se PUES gem taf mE . ; 

anon PERE BOE aarp NEAT OE 


: 9 
.) oe NFC 3100 MAGTAFE DRIVER ---------- 
i; , 
(4 618 SOOO OOOO OOOO OIOOOIOIO IOC IOOOIOIO OOOO IOI IOOIO IOI ICIOIIOIOIOIOICIOIIGIOIOOINIOK ICCC IOOK ’ 
ay 619 x FILE SEARCH (SUBROUTINE) x 
4 620 SSS SS ES D925 25 SSS Soot Tete e TF TCS SSCS SSS OSSSOSSSSOSSSSSSSCSCSSCSTCSCSSCCSSSOCCOT SS 
a 621 x 9 
: 622 9 0000034C SEARCH.S EQU x 
q 623 9 0000034C 3212 MOVE .W (AZ) D1 Get requested file # 
: 624 9 OO000034E 00410001 CMP.W #1,D1 Is it file #1? . E 
a 625 9% 00000352 6E0A EGT.S SERCH.S7 Nor continue ‘ 
q 626 9 00000354 13FC000C0000 MOVE.B #12,7COMMAND Yess set adjusted command to rewind : 
: OSDB 
‘ 627 9% 0000035C 460A2 BRA REWIND.S Go do rewind g 
‘ 628 x | 
: r 629 9 QO0O00O03S5SE 33C1000005E8 SERCH.S7 MOVE.W D1i»REQFILE Save for later 9 
630 9 00000364 9279000005ES SUB.W ACTFILE,D1 Determine number of files to search and 
; 631 9 0000036A 33C1000005EC MOVE.W DiysFILECNT direction to search 
632 9 00000370 46F32 BLE.S SERCH.S2 Go search backwards 3 
633 x ae | 
634 x SEARCH FORWARD 
635 x | . , aa 3 5 
636 9 00000372 082800030021 BTST.B.. #3rSTATI(A0) Is it EOT? 
637 9 00000378 670A BEQ.S ». SERCH.SY Nor continue 
638 9% 0000037A 22BCFFFFFFFD MOVE.L © #-3%(A1) Yesr STATUS = EOT error F) 
639 9 00000380 6000FD30 BRA RETURN.S Return 
~ 640 a x ; | . ; | , 
641 9 00000384 117000140008 SERCH.S1 MOVE.B.  #FILEFWD;sGRCMD(AO) . Issue forward file command > 
642 9 0000038A 13FC00010000 MOVE.B #1,DTR_ PbS ‘Set ear en caer: ia to forward 
) —-  . OSEA aa ee | 
643 9 00000392 22BCFFFFFFF9 MOVE .L #-7 (AL) STATUS. = busy 9 
644 9 00000398 13FC00010000 MOVE.B #1/MAGINTRP Set valid interrupt flag 
0001 | . 
645 9% 000003A0 6000FD10 BRA RETURN.S Return 2 
646 x | 
: 647 x SEARCH BACKWARDS 
648 x > 
649 9 000003A4 082800020021 SERCH.S2 BTST.B #22STATI(AO) At load point? 
650 9 OO00003AA 670A BEQ.S SERCH.S3 Nor continue 
6351 9 OQOO0O03AC Z22BCFFFFFFFE MOVE.L  #-2y7(A1) Yesr STATUS = BOT error >? 
652 9 000003B2 6000FCFE ERA RETURN.S 
653 a x ac ee 
654 9% 00000386 117000150008 SERCH.S3 MOVE.B #FILEREV»GRCMD(AO) Issue reverse file command a 
655 9 000003BC 423900000SEA CLR.B DIR_FLG Set direction flag to reverse 
656 9% 000003C2 22ECFFFFFFF9 MOVE.L #-79(A1) STATUS = busy 
657 9 000003C8 13FC00010000 MOVE.B #1»MACINTRP Set valid interrupt flag 2 
 000t 7 
658 % 000003D0 4000FCEO BRA RETURNS -Return 
659? x 
460 PLrreerrecliceier Celie iter sitesier ster sitettstereerest tert terre tT eer tree ® 
661 x - FILE SEARCH (INTERRUPT ) x 
662 2010100000000 0000 OA ILI IIE LILI IIIT LI III ISIS III IIIS AA ISIS IIIA II IIIS e 
663 x 
(664-9 00000304 SEARCH.I EQU x HS Beige Fg. * 
665 9 000003D4 08000000 BTST #07D0 © Is it 1600 bpi (PE)? Ps 
666 % 00000308 6600FD82. BNE — RETN1,.1 YES» then just ignore ist interrupt 
667 9 000003DC 08010004 | _» BIST 44,01. Is FNBSY set? 
668 9 000003E0 66000094) - Sa BNET SRCH.110 ’ Check for blank tape error r ST ae 
669. 9 000003E4. 537900000SEC ‘SUBQ.W° #1,/FILECNT: ‘Decrement file search. it 1 
670 2 OOOD0ZEA 4A3900000S5EA -TST.B OIR_FLG -: Determine direction ° 
671 ? 000003F0 673C BEQ.S SERCH.IS 


Search backwards 
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00000424 


00000428 
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00000432 
00000434 
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00000444 
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00000450 
00000452 
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0000045A 
00000460 


00000464 


0000046C 
00000472 
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3439000005E8 
B479000005E6 
6712 
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67F8 
117000140008 
6000FD36 


4291 
6000FDZA 


08010002 
670A 
22BCFFFFFFFE 
S000FDIA 


5379000005E6 
3439000005E8 
E479000005E64 
6E12 
082800070029 
67F8 
117000150008 
6000FCFA 


13FC00010000 
OSEA 
082800040021 
67F8 
60A0 


4A79000005EC 
6FOOFCDS 
22BCFFFFFFEC 
5000FCCE 
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x 
x 
x 


SERCH.T1 


x 
SERCH.I2 


SERCH.I3 


x 
SERCH.I4 


x 


SERCH.I5 


x 
SERCH.I6 


SERCH.1I8 


x 
SERCH. I7 


SERCH.I9 


CO} % mM ME 


RCH.I10 


elie ceed enatia a Rene Me ot 


»MAGDVE 


SEARCH FORWARD 


BTST 
BEQ.S 
MOVE.L 
BRA 


ADDR.W 


MOVE .W. 


CMP .W 
BEQ.5 
BTST 
BEQ,S 
MOVE.E 
ERA 


CLR«L 
BRA 


#3,/Di 

SERCH.12 
#-3y(A1) 
RETURN.I 


#1,°ACTFILE 
REQFILE:D2 
ACTFILE»D2 
SERCH.14 . 
#7»STAT2Z(A0) 
SERCH.13 
#FILEFWD»GRCMD(AO) 
RETN1.I 


(Al) 
RETURN.I 


SEARCH BACKWARDS 


BTST 
BEQ.S 
MOVE.L 
BRA | 


SUBQ.W 
MOVE.W 
CMP .W 
BGT.S 
ETST 

BEQ.S 
MOVE.& 
BRA 


MOVE.E 
BTST 


BEQ.S 
ERA 


#2°Di 
SERCH.1I6 
#-2r (Al) 


RETURN. I 


#1r/ACTFILE 
REQFILE,D2 
ACTFILEsD2 
SERCH.I7 
#7»STATZ(A0) 
SERCH.I8 
#FILEREV»GRCMD(AO 
RETN1.T 


#1,DIR_FLG 
#4ySTAT1(AO) 


SERCH.19 
SERCH.I3 
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Is it E0OT? 

Noy continue 

Yess STATUS = EOT error 
Return 


Increment file counter 

Get requested file # 

More to search? 

Nor continue 

Wait for 

Try again 

Yess issue forward file command 
Return 


STATUS = ready 
Return 


Is it BOT? 
Nosy continue 
STATUS = BOT error 


Return 


Decrement file counter 
Get requested file # 
More to search? ~~ | 
Noy continue 


Wait for DNBSY ~~ 


Issue backspace file command 
Return 


Set direction flag to forwarea 
Wait for FNBSY (changing direction) 


Busy - try again 
No» move to other side of file mark. 


If FILECNT >= 0 then drive stopped with more files to search and 
is therfore 3s BLANK TAPE ERROR (searched past end of written tape) 


TST.W 


BLE 


MOVE.L 
BRA 


FILECNT 
RETURN. I 
#-202(A1) 


RETURN.I 


Check file counter 


If count<=0 ignore interrupt 
STATUS = Blank tape error 
Return. 
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000004B4 
08000001 
6614 
08010003 
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22BCFFFFFFFA 


6000FC84 


08010004 
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5000FC70 


1,30SYS 3 15, »>MAGDVR 


«SA 03/08/84 16:38°56 


KKKKK KKK KKM KAR MK KM KM KKK KK KKK KKK KKK KKK KKK KK KKK KKM KKK KKK KK KKK KK KK KKK KKK KK KK 


x WRITE END-OF-FILE MARK 

x 

FILMRK.S EQU x 
BTST.B #6,STATICAO) 
BEQ.S FILMK.S1 
MOVE.L #-S7 (Al) 
BRA RETURN.S © 

x : 

FILMK.S1 MOVE.B #WRTEOF sGRCOMDCAO) 
MOVE.L #-77(AL) 
MOVE.B #1»MAGINTRP 
BRA RETURN.S 

x 


x WRITE END-OF-FILE MARK 
x 3 
FILMRK.I EQU x 
BTST #1700 ~—~—*~ 
BNE.S FILMK.1I2 
BIST #37D1. 
BEQ.S FILMK.I1 
MOVE.L #-3y7(A1) 
BRA — -RETURN.I: 
x e : 
FILMK.1I1 MOVE.L #-67 (Al) 
BRA  -RETURN,I 
‘ | 
FILMK.I2 BIST #4Di 
BEQ . RETN1.1I 
CLReL (Al) 
ADDG,W #1rACTFILE 
BRA RETURN.I 


(SUBROUTINE ) x 
MK RK KK OO OK OK KO KK OK 


Is there a2 write ring? 

Yesy continue 

STATUS = file protect error 
Return 


Issue file mark command 


STATUS = busy 
Set valid interrupt flag 


Return 


PESTS SCOSSSSSSSSSSTSSSCSSCSCSCSCSCCCTCSCCSCCCSSOCCTCSCSCCCCOCSTCSCCT CCC TS TOCTETECETEES 


CINTERRUPT ) x 
KKKMKKAKKRK KK MRK KKM KK KKK KKK KKM KKK KKK KR KK KK KK KK KK KKK KKK KK KX 


Correct interrupt? 
Yes» continue 


No ~-errory is it EOT? 


Nov must be hard error 


Yes» STATUS = EOT error 


Return 


STATUS = hard error 
Return . 


Is it FNBSY? 

Noy ignore interrupt 
Yes» STATUS = ready 
Increment file counter 
Return 
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00000522 
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00000548 
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00000552 
00000554 


00000556 
0000055A 


.- 0000055C 
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00000568 
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S6000F B80 


117600110008 
22BCFFFFFFF9 
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6000F B68 


0000054C 
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6034 


08010003 
670A 
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9342 


33C2000005EC. 


4A4A2 
6F12 
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(SUBROUTINE) x 


SS eee ee eee LoL S SS SSS SS SSSSSSESSSSSSSCSSOSSCSCOSCOSSSSCSCCOCCCLESCCTCCOCS EE 


x SKIP RECORD(S) 

x 

SKFREC.S EQU x 
MOVE.W (AZ) D2 
MOVE.W D2sREPEAT 
TST OW DZ 
BEQ RETURN.S 
BLT.S SKPRC.S2 

x 


bad 


SKIP RECORD(S) FORWARD 


Get repeat count 

Save for later 
Determine direction 
Repeat = 0» don't move 
Go skip backward 


Is it EOT? 

Nor continue 

Yesy STATUS = EOT error 
Return 


Issue skip record forward command 
STATUS = busy 
Set valid interrupt flag 


Return 


Is it BOT? 

Noy continue 

Yes» STATUS = BOT error 
Return 


Issue skip record reverse command 
STATUS = busy 
Set valid interrupt flag 


Return 
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(INTERRUPT ) x 


2 ot eee eee OLS SPSS SEP SSSSOSSSLSSSSSSSSSOSSS SCC SCCCLOCCCCCCOCCCC EE. ES 


BIST. #3°STAT1(AO) 
BEQ.S SKPRC.S$1 
MOVE.L #-3y(A1L) 
BRA RETURN.S 

x ae 

SKPRC.S1 MOVE.B #SKPFWD»yGRCMD( AO) 
MOVE.L #-7 (AL) 
MOVE.B #1*»MAGINTRP 
BRA RETURN.S 

: 

x SKIP RECORD(S) REVERSE 

x : 

SKPRC.S2 BTIST.B #2rSTAT1(AO) 
REQ.S SKPRC.S$3 
MOVE.L #-29 (AL) 
BRA RETURN.S 

x 

SKPRC.S3 MOVE.B #SKPREV»GRCMD(AO) 
MOVE.L #=7%(AL) 
MOVE.E #1»>MAGINTRP 
BRA RETURN,S 

x 

x SKIP RECORD(S) 

x 

SKPREC.I EQU x 
MOVE.W REPEAT ,yD2 
TST.W D2 

SKPRC.14 


BLT.S: 


SKIP RECORD(S) FORWARD 


BIST. #3eD1 
BEQ.S. SKPRC.I1 
MOVE.L © #<-39 CAL) 
BRA RETURN.I 

x : , 

SKPRC.I1 SUBQ.WN #17D2 

a =MOVE.W° D2sREPEAT. 
“TSTAW D2 

| BLE.S SKPRC,I3 

SKPRC.1I2.BTST #7+STAT2(A0) 


Get repeat count 
Determine direction 
Ship backwards 


Is it EOT? 

Nor continue 

Yess STATUS = EOT error 
Return 


Decrement repeat count 
Save new repeat count 
More to skip? 

Nor continue 

Is DNBSY? 


or ad 
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SKFRC.I3 


x 
x 
x 


SKPRC.14 


x 
SKPRC.IS 


082800070029 SKFRC.I6 


67F8 


117000110008 


6000F BAS 


Oe ieee ee 


SKIF 


BTST 
BEQ.S 
MOVE.L 
BRA 


ADDQ.N 
MOVE.W 
TST.W 
BGE.S 
BIST 
BEQ.S 
MOVE .B 
ERA 


«MAGDVR 


SKPRC.I2 | 


#SKPFWD»GRCMD(AO) | 


RETN1,.I 


(Al) 
RETURN.I 


RECORD(S) BACKWARDS 


#2°D1 

SKPRC.IS 
#-Z29(A1) 
RETURN.I 


#1,D2— 

D2,REFEAT 

D2 

SKPRC.I3 

#7 »STATZ(A0) 
SKPRC.I6 
#SKPREVsGRCMDCAO) 
RETNI.I 
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No» try again 


Yessy issue skip forward record command 


Return 


STATUS = ready 
RETURN 


Is it BOT? 

No» continue 

Yess STATUS = BOT error 
Return 


Increment repeat count 

Save new repeat count 

More to skip? 

Nor continue 

Is DNBSY? 

Nor try again 

Yessy issue skip reverse command 


Return 
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OOO OOOO OOOO OOOO OOO IOI IO IOIOIOIOIOOK IO KIO OK K 
x. TIME OUT HANDLER ‘ 


x 
MAGDVR,T EQU x 


MOVEM.L REGLIST»REGSAVE Save the registers 


MOVEA.L STAT_ADKrAI Get the status address 


MOVE.L #-107(AL) © STATUS = time out 
MOVEM.L REGSAVE*REGLIST Restore registers 
RTE Return 


eRe NIT TT 
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be te eee oe ree metas Be 


a 7 >? 
/ 
e MOTOROLA M68000 ASM VERSION 1.30SYS { 15, sMAGDVR =.SA 08/08/84 16:38:56 ia ° 
---------- NFC 3100 MAGTAPE DRIVER ---------- oe | 

a 851 FT ee FT oe ee DS SFO SECO SESS OSOSSSSCSOSCSTSESESECSCSSECSCTCCCCOCCCCCCCCTCCCCC CECT COTS ’ 
852 x CONSTANTS AND STORAGE x ) vat % 
- 853 oD DS eS Deo oto ee FF FFF CSCS ESS SSS OSSSSSSSESSSSSSCSOSSEOSOSCSCTCOSCSCCSCCCCCCCCOCLE CE CCS } ; : 
] 8355 7% 00000504 00040000 MAG_IO DC.L $40000 Base address of MAG I/0 7 a | 
q 836 9 000005DB 00000002 PFSWSAVE OS.W 1 Processor status word r 
4 : 857 9 O00005DA 00000001 RETRY DS.& 1 Re-read counter , : 
4 B38 9 OOOOOSDE 00000001 COMMAND OS.B 1 Copy of present command E 
4 859 9 O00005SDC 00000004 STAT_ADR DS.L 1 Current status address . P 
a a 860 9 OOD0OSEO 00000004 BUF_ADR DS.L 1 Buffer address 2 
: 8461 9% 000005E4 00000002 BUF_CNT DS.W 1 Byte count of buffer i 
y B46Z 9% OOD00OSES 00000002 ACTFILE DS.W i Actual file number : 
is a 863 9 OOO00SEB 00000002 REQFILE ODS.W 1 Requested file number P : 
q 864 9 OOOOOSEA 00000001 DIR_FLG ODS.& 1 Direction flag : 
. 865 9 OODODOSEC 00000000 FILECNT OS.W 0 File counter for searching ' 
. 2 B66 9% OOOOOSEC 00000002 REPEAT DS.W 1 Skip record counter Py | 
q 867 x ; 
i 868 END 
2 ad xxaxxKx TOTAL ERRORS » 
t *xKxXKK TOTAL WARNINGS | 
4 ‘ 
a°* > | 
7 ? Pe 
t 7 
| : 
t : ® 
1,’ ° : 

2 » 

; D> » 

1? . 
q | 
q ® a ! 
Pp: 

@ 
® | 
@ ; 
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) MOTOROLA M68000 ASM VERSION 1.30SYS ? 15. 
awnen----- NPC 3100 MAGTAFE DRIVER -~-------- 


»MAGDYR *SA 03/08/84 146238356 Feasts t eee 


) SYMBOL TABLE LISTING 


SYMBOL NAME SECT VALUE CROSS-REF (LINENUMBERS) 

A 9 000001DE -474 475 
ACTFILE 9 O00005E4 -862 386 472 600 614 630 680 482 599 701 755 i 
BUF_ADR 9 000005E0 -8460 306 370 j 
BUF _CNT 9 000005E4 ~861 448 489 531 543 574 ! 
CMND.1 9 0000006A ~319 313 
CMND.2 9 0000007A -323 320 
CMND.3 9 00000082 ~334 322 

-CMND,.4 9 0000011C ~391 377 

CMND.S 9 00000126 -~398 

CMNDS,I 9 00000134 ~405 400 
CMNDS.S 9 00000096 ~343 336 . 
COMMAND 9 000005DB -858 335 399 526 
DATIO 00000001 -248 483 551 
DIRSL 00000038 -275 
DIR_FLG 9 - 000005EA -864 642 655 670 708 
DSCMD 00000010 -270 383 384 429 431 446 530 594 
FILECNT 9 OOO000SEC -865 631 549 716 
FILEFWD 00000014 ~253 641 686 
FILEREV 00000015 ~254 654 705 

FILMK.I1 9 000004CA ~749 745 

FILMK.I2 9 000004D4 ~752 743 

FILMK.S1 9 0000049C -732 728 

FILMRK.I 9 00000484 ~741 410 

FILMRK.S 9 0000048A -726- 348 

FMTDOSBL 00000004 -262 384 431 ; 
GRCMD 00000008 -269 454 502 507 559 641 654 686 705 732 777 789 816 835 
INIT.I 9 O000017A ~438 405 ; 
INIT.S 9 00000164 ~428 343 E 
LSWRD 00000030 -274 558 
MAGDVR XDEF 9 0000002E -294 -7 f 
MAGDVR.I XDEF 9 000000C2 ~366 -9 | 
MAGDVR.T XDEF 9 000005B8 -843 -10 : 
MAGDVR1 XDEF 9 OOO000ZE -295 -8 | - 
MAGINTRE XDEF 9 00000001 -280 -7 376 419 456 5461 596 644 657 734 779 791 
MAG_IO 9 000005D4 -855 308 369 | 
MAXINVAL 9 00000000 -279 
MTA_RST 00000008 ~-263 383 429 446 530 E 
OFFLINE 00000002 ~261 F 
PSWSAVE 9  000005D8 -B56 297 355 
READ.I 9 OO0001BC ~463 406 
READ.I1 9  O00001EA -~478 470 490 i 
READ.I2 9 00000214 ~494 479 i 
READ.I3 9 0000021C ~498 467 | 
READ.14 9 00000238 -505 506 | 
READ.IS. 9 0000024A. ~-510 504. F 
READ.I6 9 00000254 -513 499 
READ.I7 9 00000222 -500 501 F 
READ.S 9 OOCO01L7E -445 344 
READ. S1 9  000001A4. -454 450 7 [ 
-READFWD | : 00000000 -249 454 507 “ i 

- READREV. 00000001. -250 = he ; : 
REGLIST REG x ~281 299 354 368 420 844 847 f 
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MOTOROLA M&é8000 ASM VERSION 1.30SYS 
i NEC 3100 MAGTAFE DRIVER 

REGSAVE 9 00000002 -~283 
REFEAT 9 OOOOOSEC -866 
REQFILE 9 OOOOOSES ~B863 
RETN1.I 9 0000015C ~420 
RETRY ? 000005DA ~857 
RETURN.I 00000156 “419 
690 
RETURN.S 9 OO00000B2 ~353 
730 
REWIND.I 9 000003ZE -607 
REWIND.S 9 00000300 -S91 
REWND 00000001 -~260 
REWND.I1 9 0000033E -613 
REWND.S1 9 00000320 -399 
ROTCHAR 9 0000025E -318 
SEARCH.I 9 000003D4 ~664 
SEARCH.S 9 0000034C -622 
SERCH.11 9 000003FZ2 ~675 
SERCH.I2 7 00000402 -680 
SERCH.13 9 00000416 -~684 
-SERCH.I4 9 00000428 -~689 
SERCH.IS 9 0000042E -~694 
SERCH.1I6 9 0000043E ~699 
SERCH.17 9 00000464 -708 
SERCH.18 9 00000452 ~703 
SERCH,.19 9 0000046C - -709 
SERCH.S1 9 00000384 ~641 
SERCH.S2 9 000003A4 ~649 
SERCH.S3 9 000003B6 ~654 
SERCH.S7 9 OO00035E ~629 
SKPFRD 00000010 -295 
SKPRC.T1 ? 00000566 -810 
‘SKPRC.I2 7 000005872 ~814 
SKPRC.I3 9 00000584 -B819 
SKPRC.14 9 0000058A ~824 
SKPRC.IS 9 O00000S9A ~B29 
SKPRC.16 9 000005A6 -833 
SKPRC.S1 9 O0000050A a Ae 
SKPRC.S2 9 00000522 ~784 
SKPRC.S3 ? 00000534 =/ 89 
SKPREC.1 9 0000054C -798 
SKPREC.S 9 OOO004ES -763 
SKPREV 00000011 ~-256 
SRCH.I10 9 00000476 ~716 
STATI 00000021 al #8" 
709 

STAT2 00000029 ~273 
STAT_ADR 9 00000S5DC ~B859 
TRSEL | 00000018 ~271 
VI. 9 00000112 ~386 
~WRITE.T go 000002CA -568 
WRITE.I1 9 000002E4 -578 
WRITE.I2 9 000002F6 -383 
WRITE .I3 9 000002ZDA ~374 
WRITE.S 9 00000262 -329 
_ WRITE.S1 9 00000280 ~537 
WRITE.S2. 9 00000292 -342 
WRITE.S3 4 000002AC -5358 
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